﻿Public Class Form1

    Private Sub btncong_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btncong.Click
        Dim a As Single
        Dim b As Single
        Dim kq As Single

        a = Convert.ToSingle(txtso1.Text)
        b = Convert.ToSingle(txtso2.Text)

        kq = a + b
        txtketqua.Text = kq.ToString()
    End Sub

    Private Sub btntru_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntru.Click
        Dim a As Single
        Dim b As Single
        Dim kq As Single

        a = Convert.ToSingle(txtso1.Text)
        b = Convert.ToSingle(txtso2.Text)

        kq = a - b
        txtketqua.Text = kq.ToString()
    End Sub
End Class
